home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CU Amiga Super CD-ROM 14
/
CU Amiga Magazine's Super CD-ROM 14 (1997)(EMAP Images)(GB)(Track 1 of 3)[!][issue 1997-09].iso
/
ProjectXG
/
Camouflage_1.49
/
installdemo
< prev
next >
Wrap
Text File
|
1996-01-28
|
2KB
|
188 lines
(transcript "Installation 1.05-Camouflage/MIDI-System 68020-DEMO ")
(onerror
(makeassign "Cto" (safe))
)
(complete 0)
(set @default-dest "DH0:")
(set camdest
(askdir
(prompt "Install Camouflage to ?")
(help @askdir-help)
(default @default-dest)
)
)
(set @default-dest camdest)
; Die Directories
(makeassign "Cto"
(camdest)
(safe)
)
(makedir "Cto:Camouflage"
(infos)
(safe)
)
(copyfiles
(source "gminst.info")
(dest "Cto:camouflage/")
)
(copyfiles
(source "gminst")
(dest "Cto:camouflage/")
)
(copyfiles
(source "Camouflage.info")
(dest "Cto:camouflage/")
)
(copyfiles
(source "Camouflage")
(dest "Cto:camouflage/")
)
(complete 85)
; Die Fonts
(makedir
"Fonts:Cam"
(safe)
)
; Die Fonts
(makedir
"Fonts:Cambl"
(safe)
)
(copyfiles
(source "fonts/cam.font")
(dest "Fonts:")
)
(copyfiles
(source "fonts/cambl.font")
(dest "Fonts:")
)
(copyfiles
(source "fonts/cam/41")
(dest "Fonts:cam")
)
(copyfiles
(source "fonts/cam/11")
(dest "Fonts:cam")
)
(copyfiles
(source "fonts/cam/7")
(dest "Fonts:cam")
)
(copyfiles
(source "fonts/cambl/11")
(dest "Fonts:cambl")
)
(makedir "cto:camouflage/songs"
(infos)
(safe)
)
(makedir "cto:camouflage/tracks"
(infos)
(safe)
)
(makedir "cto:camouflage/blocks"
(infos)
(safe)
)
(makedir "cto:camouflage/midifiles"
(infos)
(safe)
)
(makedir "Cto:camouflage/pool"
(infos)
(safe)
)
(makedir "Cto:camouflage/sysex"
(infos)
(safe)
)
(makedir "Cto:camouflage/waves"
(infos)
(safe)
)
(makedir "Cto:camouflage/drums"
(infos)
(safe)
)
(makedir "Cto:camouflage/rhythms"
(infos)
(safe)
)
(makedir "Cto:camouflage/mmg"
(infos)
(safe)
)
(makedir "Cto:camouflage/transforms"
(infos)
(safe)
)
(makedir "Cto:camouflage/splits"
(infos)
(safe)
)
(makedir "Cto:camouflage/chords"
(infos)
(safe)
)
(makedir "Cto:camouflage/keys"
(safe)
)
(copyfiles
(source "keys/")
(dest "Cto:camouflage/keys/")
(pattern "#?")
(prompt "Keyfiles ...")
)
(copyfiles
(source "patt/")
(dest "Cto:camouflage/patt/")
(pattern "#?")
(prompt "Pattern ...")
)
(makeassign "Cto"
(safe)
)
(exit)